Month.cls

Language: Visual Basic Class
Last Modified: 2020-06-27 1:58:30 PM UTC
File Size: 657 bytes

http://www.penguinstew.ca/example/ExcelSQLExport/Month.cls

VERSION10CLASS

BEGIN

MultiUse=1True

END

AttributeVB_Name=Month

AttributeVB_GlobalNameSpace=False

AttributeVB_Creatable=False

AttributeVB_PredeclaredId=False

AttributeVB_Exposed=False

PublicMonthIdAsInteger

PublicMonthDateAsDate

PublicStartCheuqingAsDouble

PublicStartSavingsAsDouble

PublicstartCashAsDouble

PublicFunctionToSQLAsString

ToSQL=INSERTINTO[Months][MonthId][Date][StartChequing][StartSavings][StartCash]VALUESMeMonthIdFormatMeMonthDateyyyymmddMeStartCheuqingMeStartSavingsMestartCash

EndFunction